-- card: 4827 from stack: in.1 -- bmap block id: 0 -- flags: 0000 -- background id: 3803 -- name: ----- HyperTalk script ----- on mouseDown play "boing" end mouseDown -- part 1 (field) -- low flags: 01 -- high flags: 0004 -- rect: left=131 top=30 right=263 bottom=382 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 6 -- text size: 18 -- style flags: 0 -- line height: 24 -- part name: -- part 2 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=210 top=106 right=128 bottom=310 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Breakfast ----- HyperTalk script ----- on mouseDown end mouseDown on mouseUp global breakfastList visual effect iris open if field 1 of recent card is not empty then answer "Breakfast already ordered today." with "OK" pop card choose button tool get loc of bkgnd button 7 click at it answer "Reset card to Re-Order Meals" with "OK" choose browse tool exit mouseUp end if go card id 5849 end mouseUp -- part 3 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=209 top=143 right=165 bottom=309 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Lunch ----- HyperTalk script ----- on mouseDown end mouseDown on mouseUp answer " Not implemented in this version." with "OK" end mouseUp -- part 4 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=208 top=185 right=207 bottom=308 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Dinner ----- HyperTalk script ----- on mouseDown end mouseDown on mouseUp Answer "Full version required for this menu." with "I Guess" end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 8003 -- rect: left=209 top=222 right=244 bottom=309 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Snacks ----- HyperTalk script ----- on mouseDown end mouseDown on mouseUp Answer "Full version required, see Order Info." with "Oh, ALRIGHT!" end mouseUp -- part 6 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=484 top=319 right=341 bottom=510 -- title width / last selected line: 0 -- icon id / first selected line: 1012 / 1012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Return ----- HyperTalk script ----- on mouseDown --trap for mouseDown end mouseDown on mouseUp pop card end mouseUp -- part contents for card part 1 ----- text ----- Choose a menu: